{

1,1
2,1 2,2
3,1 3,2 3,3
4,1 4,2 4,3 4,4

a(i,j) =?
k=i-j+1
a(i,j)=(n-k)*(n-k+1)/2+j;
}

var
	n,i,j,k:longint;
begin
	read(n);
	for i:=1 to n do
	begin
		for j:=1 to i do
		begin
			k:=i-j+1;
			write((n-k)*(n-k+1) div 2+j,' ');
		end;
		writeln;
	end;
end.
